home *** CD-ROM | disk | FTP | other *** search
- #[document 64.45 153.4 141.95 230.9
- static oe="odd_even",nzw="nonzero_winding",wc="winding_counting";
- static stroked="stroked";
- static vert="vertical",horz="horizontal";
- static miter="miter",bevel="bevel",round="round";
- static butt="butt",proj="projected";
- #[page
- auto m=move,l=line,c=curve;
- auto p;
- gc_cspace("Lab");
- gc_color(100.0,0.0,0.0);
- rect(0,0,0,0);
- auto ng=draw(path());
- auto s=array(ng);
- m(129.05,192.50);
- c(129.05,178.25,117.45,166.65,103.20,166.65);
- c(88.95,166.65,77.35,178.25,77.35,192.50);
- finish_edge();
- p=path();
- gc_draw_style(stroked);
- gc_line_join_style(round);
- gc_stroke_width(5.00);
- gc_font_draw_style(0);
- gc_color(100.00,0.00,0.01);
- s[0]=draw(p);
- m(106.40,172.45);
- l(116.85,171.45);
- l(112.55,166.05);
- l(118.20,170.05);
- l(120.15,161.55);
- l(120.80,169.80);
- l(125.75,166.30);
- l(122.20,171.05);
- l(132.25,172.55);
- l(122.05,173.80);
- l(126.25,179.30);
- l(121.05,175.45);
- l(119.15,182.45);
- l(117.95,175.45);
- l(113.05,179.55);
- l(116.75,173.80);
- l(106.40,172.45);
- close_edge();
- p=path();
- gc_draw_style(nzw);
- s[1]=draw(p);
- s[0]:=s[1];
- m(64.45,192.15);
- c(64.45,170.75,81.80,153.40,103.20,153.40);
- c(124.60,153.40,141.95,170.75,141.95,192.15);
- c(141.95,213.55,124.60,230.90,103.20,230.90);
- c(81.80,230.90,64.45,213.55,64.45,192.15);
- close_edge();
- p=path();
- gc_color(54.38,-23.95,-12.31);
- s[1]=draw(p);
- s[0]over=s[1];
- page:=s[0];
- s=NULL;
- #]page
- #]document
-